OpenEdge Development:<br />Progress 4GL Reference SQRT function

Release 10.1A: OpenEdge Development:
Progress 4GL Reference

SQRT function

Returns the square root (as a decimal value) of an expression you specify.

Syntax
SQRT ( expression ) 
expression
A numeric expression. If the value of the expression is negative, SQRT returns the Unknown value (?).
Example

This procedure prompts for a number and then displays the square root of that number:
r-sqrt.p
DEFINE VARIABLE num AS INTEGER FORMAT ">,>>9"
  LABEL "Enter a number between 1 and 9,999".

REPEAT WITH SIDE-LABELS CENTERED
  TITLE "SQUARE ROOT GENERATOR" COLUMN 20 1 DOWN.
  DISPLAY SKIP(2).
  SET num SKIP(2).
  DISPLAY "The square root of " + string(num) + " is" 
    FORMAT "x(27)"
    SQRT(num) FORMAT ">>>.9999".
END. 